object frmEntradaBalanco: TfrmEntradaBalanco
  Left = 287
  Top = 125
  BorderStyle = bsSingle
  Caption = 'Contagem de Itens'
  ClientHeight = 516
  ClientWidth = 690
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poDefault
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 40
    Width = 690
    Height = 476
    Align = alBottom
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 51
      Height = 13
      Caption = 'Balan'#231'o:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 472
      Top = 12
      Width = 48
      Height = 13
      Caption = 'Usu'#225'rio:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 560
      Top = 12
      Width = 32
      Height = 13
      Caption = 'Data:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label4: TLabel
      Left = 8
      Top = 52
      Width = 98
      Height = 13
      Caption = 'C'#243'digo ou Serial:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label5: TLabel
      Left = 8
      Top = 96
      Width = 37
      Height = 13
      Caption = 'Saldo:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lbl_usuario: TLabel
      Left = 472
      Top = 32
      Width = 21
      Height = 13
      Caption = 'FRE'
    end
    object lbl_data: TLabel
      Left = 560
      Top = 32
      Width = 58
      Height = 13
      Caption = '12/12/2012'
    end
    object cb_balanco: TComboBox
      Left = 8
      Top = 24
      Width = 329
      Height = 21
      Hint = 'Descri'#231#227'o do Balan'#231'o'
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 0
      OnChange = cb_balancoChange
    end
    object edt_serial: TEdit
      Left = 8
      Top = 68
      Width = 187
      Height = 21
      Hint = 'C'#243'digo ou Serial do Produto'
      Enabled = False
      TabOrder = 1
      OnChange = edt_serialChange
      OnExit = edt_serialExit
    end
    object edt_saldo: TEdit
      Left = 8
      Top = 112
      Width = 217
      Height = 21
      Hint = 'Saldo Contado'
      Enabled = False
      TabOrder = 2
      OnExit = edt_saldoExit
    end
    object btn_pesq: TButton
      Left = 197
      Top = 68
      Width = 28
      Height = 22
      Caption = '...'
      Enabled = False
      TabOrder = 3
      TabStop = False
      OnClick = btn_pesqClick
    end
    object btn_salvar: TBitBtn
      Left = 8
      Top = 136
      Width = 75
      Height = 25
      Caption = 'Salvar'
      Enabled = False
      TabOrder = 4
      OnClick = btn_salvarClick
    end
    object st_produto: TStaticText
      Left = 227
      Top = 68
      Width = 457
      Height = 21
      AutoSize = False
      BorderStyle = sbsSingle
      TabOrder = 5
    end
    object DBGrid1: TDBGrid
      Left = 8
      Top = 168
      Width = 673
      Height = 273
      DataSource = dsEstoque
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 6
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnCellClick = DBGrid1CellClick
    end
    object btnSelecionarBalanco: TButton
      Left = 336
      Top = 24
      Width = 113
      Height = 21
      Caption = 'Selecionar Balan'#231'o'
      Enabled = False
      TabOrder = 7
      OnClick = btnSelecionarBalancoClick
    end
    object BitBtn1: TBitBtn
      Left = 608
      Top = 448
      Width = 75
      Height = 25
      Caption = '&Sair'
      TabOrder = 8
      Kind = bkClose
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 690
    Height = 40
    Align = alTop
    BevelInner = bvLowered
    BorderWidth = 2
    Caption = 'Contagem de Itens'
    Color = clWhite
    Ctl3D = True
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -27
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold, fsItalic]
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 1
  end
  object SQLC_Estoque: TSQLClientDataSet
    CommandText = 
      'SELECT '#13#10'  CODIGO,'#13#10'  SERIAL,'#13#10'  DESCRICAO,'#13#10'  USUARIO,'#13#10'  SALDO' +
      ','#13#10'  DATA'#13#10'FROM '#13#10'  BALANCO_ESTOQUE'#13#10'WHERE BALANCO = :BALANCO'#13#10'A' +
      'ND SALDO IS NOT NULL'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftInteger
        Name = 'BALANCO'
        ParamType = ptInput
      end>
    DBConnection = DtmGeral.ConexaoBanco
    Left = 472
    Top = 88
  end
  object dsEstoque: TDataSource
    DataSet = SQLC_Estoque
    Left = 544
    Top = 88
  end
  object SP_INSERIR: TSQLQuery
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftUnknown
        Name = 'COD_BALANCO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'COD_USUARIO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SALDO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'COD_PRODUTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SERIAL'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'INCREMENTA'
        ParamType = ptUnknown
      end>
    SQL.Strings = (
      
        'EXECUTE PROCEDURE UP_INSERIR_ITEM_BALANCO( :COD_BALANCO, :COD_US' +
        'UARIO, :SALDO, :COD_PRODUTO, :SERIAL, :INCREMENTA);')
    SQLConnection = DtmGeral.ConexaoBanco
    Left = 392
    Top = 88
  end
end
